﻿Public Class EPersonas

    Private ape_nom As String
    Private tipo_dni As String
    Private dom_legal As String
    Private piso_legal As String
    Private dpto_legal As String
    Private dom_real As String
    Private piso_real As String
    Private dpto_real As String
    Private tramite As String
    Private num_dni As String
    Private num_legal As Integer
    Private num_real As Integer
    Private tel_fijo As Integer
    Private tel_movil As Integer

    Public Sub New()
        MyBase.New()
        ape_nom = ""
        tipo_dni = ""
        dom_legal = ""
        piso_legal = ""
        dpto_legal = ""
        dom_real = ""
        piso_real = ""
        dpto_real = ""
        tramite = ""
        num_dni = ""
        num_legal = 0
        num_real = 0
        tel_fijo = 0
        tel_movil = 0

    End Sub
    Public Property apenom()
        Get
            Return ape_nom
        End Get
        Set(ByVal value)
            ape_nom = value
        End Set
    End Property

    Public Property tramite_personas()
        Get
            Return tramite
        End Get
        Set(ByVal value)
            tramite = value
        End Set
    End Property

    Public Property tipodni()
        Get
            Return tipo_dni
        End Get
        Set(ByVal value)
            tipo_dni = value
        End Set
    End Property

    Public Property numdni()
        Get
            Return num_dni
        End Get
        Set(ByVal value)
            num_dni = value
        End Set
    End Property

    Public Property domlegal()
        Get
            Return dom_legal
        End Get
        Set(ByVal value)
            dom_legal = value
        End Set
    End Property
    Public Property pisolegal()
        Get
            Return piso_legal
        End Get
        Set(ByVal value)
            piso_legal = value
        End Set
    End Property
    Public Property dptolegal()
        Get
            Return dpto_legal
        End Get
        Set(ByVal value)
            dpto_legal = value
        End Set
    End Property


    Public Property domreal()
        Get
            Return dom_real
        End Get
        Set(ByVal value)
            dom_real = value
        End Set
    End Property

    Public Property numreal()
        Get
            Return num_real
        End Get
        Set(ByVal value)
            num_real = value
        End Set
    End Property


    Public Property numlegal()
        Get
            Return num_legal
        End Get
        Set(ByVal value)
            num_legal = value
        End Set
    End Property


    Public Property pisoreal()
        Get
            Return piso_real
        End Get
        Set(ByVal value)
            piso_real = value
        End Set
    End Property
    Public Property dptoreal()
        Get
            Return dpto_real
        End Get
        Set(ByVal value)
            dpto_real = value
        End Set
    End Property

    Public Property telfijo()
        Get
            Return tel_fijo
        End Get
        Set(ByVal value)
            tel_fijo = value
        End Set
    End Property
    Public Property telmovil()
        Get
            Return tel_movil
        End Get
        Set(ByVal value)
            tel_movil = value
        End Set
    End Property
   

End Class

